home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / compuserve-file-archive / 04 geoProgramming / COPEIN.SDA / EDITFUN (.txt) < prev    next >
Encoding:
GEOS ConVerT  |  2019-04-13  |  939 b   |  38 lines
  1. EDITFUN
  2. SEQ formatted GEOS file V1.0
  3. Epson FX-80
  4.     UTILITY
  5. LASTER'S 
  6. ONVERTER 
  7. EDITFUN
  8. TABLES
  9. COPE Source V1.1
  10. DISK A
  11. COPE Editor V1.1
  12. Untitled
  13. EDITFUN
  14. A$APAwA
  15. /; The name of this file is EDITFUNCTION
  16. CUT COPY CLEAR PASTE
  17.  JSR $C1BD
  18. CUT1X COPY1X PASTE1X
  19.  loadw R0:VNDB8
  20.  JSR $C256
  21. ;-  DIALOG BOX FOR PROMPT
  22. VNDB8
  23. .BYTE 128+2
  24. .Byte 2,17,77-8
  25. .BYTE 11,8,24
  26. .WORD Xd11
  27. .BYTE 11,8,36
  28. .WORD Xd2
  29. .BYTE 11,8,48
  30. .WORD Xd3
  31. .Byte 14
  32. .Byte 0
  33. Xd11 .BYTE 'You have selected a resident',0
  34. Xd2 .BYTE 'routine.  No disk access',0
  35. Xd3 .BYTE 'is necessary to run.',0
  36. ;=======
  37. ;=========
  38.